﻿<%
'这是系统公用函数别名,用于解决类中与公用函数同名而引起的问题

'''Rand函数的重名替代
Function Rand_s(Byval p_s, Byval p_b)
	Rand_s = Rand(p_s, p_b)
End Function

'''RandStr函数的重名替代
Function RandStr_s(Byval p_c)
	RandStr_s = RandStr(p_c)
End Function

'''Has函数的重名替代
Function Has_s(Byval p_s)
	Has_s = Not IsN(p_s)
End Function
%>